object frmAttachs: TfrmAttachs
  Left = 0
  Top = 0
  Width = 240
  Height = 300
  TabOrder = 0
  object grdAttachs: TcxGrid
    Left = 0
    Top = 0
    Width = 240
    Height = 300
    Align = alClient
    TabOrder = 0
    ExplicitLeft = 12
    ExplicitWidth = 250
    ExplicitHeight = 200
    object tvAttachs: TcxGridDBTableView
      PopupMenu = popAttachs
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsAttachs
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsView.GroupByBox = False
    end
    object lvAttachs: TcxGridLevel
      GridView = tvAttachs
    end
  end
  object sdlgAttachs: TSaveDialog
    Left = 159
    Top = 15
  end
  object ilFiles: TImageList
    Left = 129
    Top = 15
  end
  object odlgAttachs: TOpenDialog
    Left = 99
    Top = 15
  end
  object popAttachs: TPopupMenu
    Left = 67
    Top = 15
    object itemAdd: TMenuItem
      Caption = #28155#21152
    end
    object itemDelete: TMenuItem
      Caption = #21024#38500
    end
    object itemSaveAs: TMenuItem
      Caption = #21478#23384#20026
    end
  end
  object dsAttachs: TDADataSource
    DataSet = tblAttachs.Dataset
    DataTable = tblAttachs
    Left = 37
    Top = 15
  end
  object tblAttachs: TDAMemDataTable
    RemoteUpdatesOptions = [ruoOnPost]
    Fields = <
      item
        Name = 'ba_pid'
        DataType = datGuid
        Required = True
      end
      item
        Name = 'ba_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'ba_filename'
        DataType = datString
        Size = 30
      end
      item
        Name = 'ba_ext'
        DataType = datString
        Size = 10
      end
      item
        Name = 'ba_size'
        DataType = datInteger
      end
      item
        Name = 'ba_desc'
        DataType = datString
        Size = 60
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_attachments'
    IndexDefs = <>
    Left = 5
    Top = 15
  end
end
